home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1986 November
/
Ahoy_Magazine_86-11_1986_Double_L.d64
/
Deluxe List49152
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
910b
|
27 lines
5 print"[147]":poke53280,0:poke53281,6
10 for add=49152to49342:readn:ck=ck+n:pokeadd,n:next
20 if ck<>19399 then print"error in data statements...":stop
30 print"'sys49152' to toggle deluxe list"
40 sys49152
50 end
60 data173,189,192,73,255,141,189,192,208,18
70 data169,26,141,6,3,169,167,141,7,3
80 data169,145,160,192,32,30,171,96,169,51
90 data141,6,3,169,192,141,7,3,169,102
100 data160,192,32,30,171,169,0,141,190,192
110 data96,141,188,192,201,34,208,8,173,190
120 data192,73,255,141,190,192,173,188,192,201
130 data58,208,18,173,190,192,208,13,169,13
140 data32,210,255,169,32,32,210,255,32,210
150 data255,173,141,2,208,251,173,188,192,76
160 data26,167,68,69,76,85,88,69,32,76
170 data73,83,84,32,18,65,67,84,73,86
180 data65,84,69,68,146,45,68,79,32,78
190 data79,84,32,69,68,73,84,32,76,73
200 data78,69,83,13,0,68,69,76,85,88
210 data69,32,76,73,83,84,32,18,68,73
220 data83,65,66,76,69,68,146,45,89,79
230 data85,32,77,65,89,32,69,68,73,84
240 data32,76,73,78,69,83,13,0,0,0
250 data0